%%BaseDesign

Classname: %%BaseDesign

Copyright (c) 1990 - 2000
Heide Corporation
5 West Mill Street, Suite 5
Medfield, MA 02052 USA
All rights reserved.
Heide Corporation grants its customers the right to include all or part of
this file in their own design files, provided that this notice be included
as well.  The word "Portions" may precede the Heide copyright notice if the
new file includes non-Heide source code.

DefClass: %%BaseDesign ();

	(Uncached Instance) self: self();
	(Uncached Name) designName: partDesign(self:);
	(List) children: children();

    givenName (String)
    The default behavior of child rules is that they create instances whose
    names match the name of the child rule.  For example, child rule MyPoint
    would create an instance called MyPoint.  This name is statically defined
    within a dfa file like so:
    (Child) MyPoint: { class, ug_point };
    The givenName parameter can be used to name an instance differently from the
    name of the rule which created it.  This is used whenever the name of the
    instance needs to be set dynamically.  For example,
    (Child) MyPoint: { class, ug_point; givenName, "MyPoint" + getNextIndex() };
    This is the intended use of givenName and should not be used with dynamic
    rules that are created interactively through Add Child Rule functionality
    in NX.

	(Uncached String Parameter) givenName: "%%NoName";

	(Uncached Boolean) isNull?: False;
	(String) refChain: refChainFromWorld();

	# Methods

	(Method Boolean) hasRule?:(Name $ruleName) @{
		hasRule?(self(); $ruleName);
		};

	(Method Boolean) isBound?:(Name $ruleName) @{
		isBound?(self(); $ruleName);
		};

	(Method Boolean) isKindOf?:(Name $designName) @{  
		isKindOf?(self(); $designName);
		};
	

BaseDesign

Classname: BaseDesign

Inherits from: BaseDesignModifier , HostBaseDesign , %%BaseDesign

DefClass: BaseDesign (BaseDesignModifier HostBaseDesign %%BaseDesign);